From: Eli Zaretskii Date: Sun, 4 Feb 2007 16:01:37 +0000 (+0000) Subject: (widget-default-create): Insert new text at the :from marker _after_ the X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~2409 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=55f9235d573905ab950bee4a4e7d05bc55e1e4cb;p=emacs.git (widget-default-create): Insert new text at the :from marker _after_ the marker, not before it. --- diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 2e11b655752..d0ff5c0b956 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -1509,7 +1509,7 @@ If that does not exists, call the value of `widget-complete-field'." (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to (point-max-marker))) - (set-marker-insertion-type from t) + (set-marker-insertion-type from nil) (set-marker-insertion-type to nil) (widget-put widget :from from) (widget-put widget :to to)))